!------------------------------------------------------------------------------
! TJU/Department of Mechanics, Fluid Mechanics, Code START
!------------------------------------------------------------------------------
!> @Author: Jianxin Liu shookware@tju.edu.cn
!> @Date: 2024-08-16 12:37:26
!> @LastEditTime: 2024-08-16 12:38:17
!> @LastEditors: Jianxin Liu shookware@tju.edu.cn
!> @Description:
!> @FilePath: /START_NS_3D/src/reconstructor/submodule_reconstructor_upwind_7order.f90
!> @Copyright (c) 2024 by Jianxin Liu email: shookware@tju.edu.cn, All Rights Reserved.
!------------------------------------------------------------------------------
submodule(mod_reconstructor) submod_reconstructor_upwind_7order

contains

   !@TODO: 需要编写7阶迎风格式代码

   module subroutine CreateUpwind7Order(this, length, stencil_width, flg_bounds, limiter)
      class(type_reconstructor_upwind_7order), intent(inout) :: this
      integer, intent(in) :: length
      integer, intent(in) :: stencil_width
      logical, intent(in) :: flg_bounds(2)
      integer, intent(in), optional :: limiter

      call petsc_print("create 7order upwind reconstructor.")

   end subroutine CreateUpwind7Order

   module subroutine ReconstructUpwind7Order(this, f, h, s)
      class(type_reconstructor_upwind_7order), intent(in) :: this
      class(type_vector_base), intent(in) :: f
      class(type_vector_base), intent(inout) :: h
      character, intent(in), optional :: s

      call petsc_print("reconstruct 7order upwind.")

   end subroutine ReconstructUpwind7Order

   module subroutine DestroyUpwind7Order(this)
      class(type_reconstructor_upwind_7order), intent(inout) :: this

      call petsc_print("destroy 7order upwind reconstructor.")

   end subroutine DestroyUpwind7Order

end submodule submod_reconstructor_upwind_7order
